﻿Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub TextBox2_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles T2.TextChanged

    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        Dim a As Integer
        Dim b As Integer
        Dim add As Integer
        a = CSng(T1.Text)
        b = CSng(T2.Text)
        add = a + b
        Label1.Text = add

    End Sub
End Class